Celestin Apprentice 7/Apprentice-Release7.iso/Source Code/C/Applications/Moscow ML 1.42/src/compiler/Opcodes.sml

Text File | 1997-08-18 | 4.1 KB | 211 lines | [TEXT/Moml]

(* made by make_opcodes.sml -- Tue Jul 22 14:39:46 1997 *)


val CONSTBYTE = 0;
val CONSTSHORT = 1;
val SWITCH = 2;
val BRANCH = 3;
val BRANCHIF = 4;
val BRANCHIFNOT = 5;
val POPBRANCHIFNOT = 6;
val BRANCHIFNEQTAG = 7;
val BRANCHIFEQ = 8;
val BRANCHIFNEQ = 9;
val BRANCHIFLT = 10;
val BRANCHIFGT = 11;
val BRANCHIFLE = 12;
val BRANCHIFGE = 13;
val BRANCHINTERVAL = 14;
val C_CALL1 = 15;
val C_CALL2 = 16;
val C_CALL3 = 17;
val C_CALL4 = 18;
val C_CALL5 = 19;
val C_CALLN = 20;
val MAKEBLOCK = 21;
val MAKEBLOCK1 = 22;
val MAKEBLOCK2 = 23;
val MAKEBLOCK3 = 24;
val MAKEBLOCK4 = 25;
val TAGOF = 26;
val ACCESS = 27;
val ACC0 = 28;
val ACC1 = 29;
val ACC2 = 30;
val ACC3 = 31;
val ACC4 = 32;
val ACC5 = 33;
val ACC6 = 34;
val ACC7 = 35;
val PUSHACC = 36;
val PUSHACC0 = 37;
val PUSHACC1 = 38;
val PUSHACC2 = 39;
val PUSHACC3 = 40;
val PUSHACC4 = 41;
val PUSHACC5 = 42;
val PUSHACC6 = 43;
val PUSHACC7 = 44;
val ENVACC = 45;
val ENV1 = 46;
val ENV2 = 47;
val ENV3 = 48;
val ENV4 = 49;
val ENV5 = 50;
val ENV6 = 51;
val ENV7 = 52;
val PUSHENVACC = 53;
val PUSHENV1 = 54;
val PUSHENV2 = 55;
val PUSHENV3 = 56;
val PUSHENV4 = 57;
val PUSHENV5 = 58;
val PUSHENV6 = 59;
val PUSHENV7 = 60;
val PUSH_ENV1_APPLY1 = 61;
val PUSH_ENV1_APPLY2 = 62;
val PUSH_ENV1_APPLY3 = 63;
val PUSH_ENV1_APPLY4 = 64;
val PUSH_ENV1_APPTERM1 = 65;
val PUSH_ENV1_APPTERM2 = 66;
val PUSH_ENV1_APPTERM3 = 67;
val PUSH_ENV1_APPTERM4 = 68;
val PUSHATOM = 69;
val ATOM = 70;
val PUSHATOM0 = 71;
val ATOM0 = 72;
val ATOM1 = 73;
val ATOM2 = 74;
val ATOM3 = 75;
val ATOM4 = 76;
val ATOM5 = 77;
val ATOM6 = 78;
val ATOM7 = 79;
val ATOM8 = 80;
val ATOM9 = 81;
val CONSTINT = 82;
val PUSHCONSTINT = 83;
val CONST0 = 84;
val CONST1 = 85;
val CONST2 = 86;
val CONST3 = 87;
val PUSHCONST0 = 88;
val PUSHCONST1 = 89;
val PUSHCONST2 = 90;
val PUSHCONST3 = 91;
val GETFIELD = 92;
val GETFIELD0 = 93;
val GETFIELD1 = 94;
val GETFIELD2 = 95;
val GETFIELD3 = 96;
val GETFIELD0_0 = 97;
val GETFIELD0_1 = 98;
val GETFIELD1_0 = 99;
val GETFIELD1_1 = 100;
val SETFIELD = 101;
val SETFIELD0 = 102;
val SETFIELD1 = 103;
val SETFIELD2 = 104;
val SETFIELD3 = 105;
val GETGLOBAL = 106;
val PUSH_GETGLOBAL = 107;
val PUSH_GETGLOBAL_APPLY1 = 108;
val PUSH_GETGLOBAL_APPLY2 = 109;
val PUSH_GETGLOBAL_APPLY3 = 110;
val PUSH_GETGLOBAL_APPLY4 = 111;
val PUSH_GETGLOBAL_APPTERM1 = 112;
val PUSH_GETGLOBAL_APPTERM2 = 113;
val PUSH_GETGLOBAL_APPTERM3 = 114;
val PUSH_GETGLOBAL_APPTERM4 = 115;
val SETGLOBAL = 116;
val PUSH_RETADDR = 117;
val APPLY = 118;
val APPLY1 = 119;
val APPLY2 = 120;
val APPLY3 = 121;
val APPLY4 = 122;
val APPTERM = 123;
val APPTERM1 = 124;
val APPTERM2 = 125;
val APPTERM3 = 126;
val APPTERM4 = 127;
val RESTART = 128;
val GRAB = 129;
val RETURN1 = 130;
val RETURN2 = 131;
val RETURN = 132;
val CLOSURE = 133;
val CLOSREC = 134;
val DUMMY = 135;
val UPDATE = 136;
val PUSHTRAP = 137;
val RAISE = 138;
val POPTRAP = 139;
val SWAP = 140;
val PUSH = 141;
val POP = 142;
val ASSIGN = 143;
val BOOLNOT = 144;
val ADDINT = 145;
val SUBINT = 146;
val MULINT = 147;
val DIVINT = 148;
val MODINT = 149;
val ANDINT = 150;
val ORINT = 151;
val XORINT = 152;
val SHIFTLEFTINT = 153;
val SHIFTRIGHTINTSIGNED = 154;
val SHIFTRIGHTINTUNSIGNED = 155;
val EQ = 156;
val NEQ = 157;
val LTINT = 158;
val GTINT = 159;
val LEINT = 160;
val GEINT = 161;
val FLOATOFINT = 162;
val SMLNEGFLOAT = 163;
val SMLADDFLOAT = 164;
val SMLSUBFLOAT = 165;
val SMLMULFLOAT = 166;
val SMLDIVFLOAT = 167;
val INTOFFLOAT = 168;
val EQFLOAT = 169;
val NEQFLOAT = 170;
val LTFLOAT = 171;
val GTFLOAT = 172;
val LEFLOAT = 173;
val GEFLOAT = 174;
val STRINGLENGTH = 175;
val GETSTRINGCHAR = 176;
val SETSTRINGCHAR = 177;
val EQSTRING = 178;
val NEQSTRING = 179;
val LTSTRING = 180;
val GTSTRING = 181;
val LESTRING = 182;
val GESTRING = 183;
val MAKEVECTOR = 184;
val VECTLENGTH = 185;
val GETVECTITEM = 186;
val SETVECTITEM = 187;
val SMLNEGINT = 188;
val SMLSUCCINT = 189;
val SMLPREDINT = 190;
val SMLADDINT = 191;
val SMLSUBINT = 192;
val SMLMULINT = 193;
val SMLDIVINT = 194;
val SMLMODINT = 195;
val MAKEREFVECTOR = 196;
val SMLQUOTINT = 197;
val SMLREMINT = 198;
val CHECK_SIGNALS = 199;
val STOP = 200;
val EQUNSIGN = 201;
val NEQUNSIGN = 202;
val LTUNSIGN = 203;
val GTUNSIGN = 204;
val LEUNSIGN = 205;
val GEUNSIGN = 206;